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Section 1 
CONSTRUCT TIMINGS 


Construct timings do not, by themselves, convey a great deal of knowledge 
about performance. They represent only one set of characteristics out of many 
that must be considered. Nevertheless, they can be very useful. 


They are more informative, for example, than the more primitive indicators 

such as clock rate or memory speed. and they are reasonably unambiguous, The 
"add time" of a computer may mean different things to different people. How~ 
ever, "A=B+C'' denotes an amount of work done, whether on a particular machine 


which involves a polish string or a three-address fixed-length instruction. 


Construct timings should be useful to the programmer who wants to understand 
how to write more efficient code. Knowing the relative speeds involved when 


choices present themselves is of obvious benefit. 


The data in this document are actual measured timings. They were obtained by 
means of programs especially designed for this purpose, taking into account 
the following: 


1. Timing Method 
FORTRAN: 


The TIME (11) function was used to read the time of day register. 
Since this function in FORTRAN calls an MCP intrinsic, one must 
consider the time involved to do this (about 80 us on a B 6700 5.0/ 
10.0 processor, 1.2 us memory). The construct was repeated N3 times 
in line within a DO loop of N2 iterations with timer readings before 
and after the DO loop. The same loop was also timed "empty", i.e., 
with no constructs within it. This loop timing also includes the 
overhead for reading the timer. The difference in times (i.e., the 
time for the loop with constructs minus the time for the "empty" 
loop) divided by N3*N2 represents the time for the construct. N3 is 
chosen so that the time for N3 constructs is much larger than the 
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Construct Timings 


1. 


FORTRAN (Continued) 


empty loop time. N2 is chosen to make the total DO loop time large in re- 
lation to the time to read the timer. This maximizes the accuracy of the 


timings. 
ALGOL : 


The timing in ALGOL was done in much the same way as in FORTRAN. The con- 
struct was repeated N3 times in line between two TIME (11) statements. 

The relatively small (about 6.4 us on a B 6700 5.0/10.0 processor) time 
required to actually read and store the time of day register was later 
subtracted out. N3 was 100 in all cases, N2 does not apply. 


COBOL: 


The method is essentially the same as described for FORTRAN, using 
PERFORM N2 TIMES of N3 construcis. N2 and N3 were usually 100 and 
50, respectively. 


Perturbations 


Should an interrupt occur at any time between timer readings, the 
timing will, of course, be distorted. Therefore, each timing loop 
was repeated to obtain a number, (N1), of observations. The few 
times which did not agree with the majority of observations were 
caused by such perturbations from interrupts and were discarded. 
Nl was usually 100 in the FORTRAN and ALGOL timings and 25 in the 
COBOL timings. 


Code Alignment 


For any construct, the generated code may occupy any one of six 
positions relative to word boundaries -- i.e., the string may start 
in syllable 0, 1, 2, etc. Some variations in timing will result 
from this, but they are of little consequence. For uniformity, all 


timings were done with code beginning in syllable zero. 
Operands 


Many of the constructs timed have a dependency on the actual values 
of the operands involved. For this reason, a variety of operands 
were used in the FORTRAN timings for these constructs to measure the 
extent of that dependency. For those cases, a "range" of times ob~ 
served is quoted. This range is over those operands used and may or 


may not include the possible minimum and maximum. 
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Repeatability 


All of the programs were run more than once ~— on different days, 
different processors, some on different systems ~ to establish the 
repeatability of the results. 


What is sometimes seen is that there are two repeatable timings. 
This occurs because the timing is affected slightly by whether the 
code and operands are in the same memory module. The amount of the 
difference varies according to the construct involved, but is rela- 
tively minor (usually 10% or less). 


But there are, in effect, two correct answers for each construct. 
Because of this, where different language constructs generate the 
same code, the timing reported may be the same or may vary slightly. 


Hardware 


One 5.0/10.0 processor was used with 1.2 us memory (B6004-1) in one 
case and 1.6 us memory (B6005-1) in the other case. 


Software 


The software release level is noted for each set of timings. For 
some constructs, the timing could conceivably change from one release 
to the next, if different code is generated. 


A sample FORTRAN timing program follows. 
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DIMENSION OBSV(1000) 


N1 = 100 
N2 = 14 
N3 = 100 


DO 30 I =1, N1 
TBEG = TIME(11) 
DO 10 J = 1, N2 


Z=X+Y¥Y 
Cc 
Cc THE CONSTRUCT ABOVE IS REPEATED SO THAT IS APPEARS 
Cc WITHIN THIS DO-LOOP A TOTAL OF N3 (N3 = 100) TIMES. 
Cc 
Cc FOR EACH SET OF OPERAND VALUES THE CONSTRUCT 
Cc IS EXECUTED N1*N2*N3 TIMES. 
Cc 
10 CONTINUE 


TEND = TIME(11) 

OBSV(I) = TEND - TBEG 

TBEG = TIME(11) 

DO 20 J = 1, N2 
20 CONTINUE 

TEND = TIME(11) 

OBSV(I) = 2.4 * (OBSV(I) - TEND + TBEG) / (N2*N3) 
30 CONTINUE 


Cc 
Cc SORT AND OUTPUT THE OBSERVATIONS (OBSV ARRAY) 
Cc 

STOP 

END 
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Section 2 
ALGOL CONSTRUCT TIMINGS 


The following timings of certain ALGOL constructs were obtained using the 
MCP and ALGOL compiler from the Mark II.6 systems software release. The 
timings of each construct for each memory speed (1.2 us and 1.6 us) are 
displayed on the following pages. An asterisk appearing between the two 
columns of timings refers to a note on the last page of this section. 


The variable names used and their data type definitions are: 


REAL XREAL, YREAL, ZREAL; 

INTEGER XINTGR,YINTGR,ZINTGR, I,J,K; 

DOUBLE XDBL , YDBL , ZDBL ; 

ARRAY ARAY1(0:9], BRAY1[0:9], 
ARAY2[0:9,0:9], BRAY2(0:9,0:9], 
ARAY3[(0:9,0:9,0:9], BRAY3[0:9,0:9,0:9]; 


A range in timing for some of the constructs is due to the different operand 


values used in the execution of the construct. The pairs of operand values 
are: 


(XREAL,YREAL) = (1@0,1@0) and (6517, - 1740) 
(XINTGR,YINTGR) = (1,1) and (6517, - 1740) 

(XDBL,YDBL) = (1@@0, 1@@0) and (4632@@31, 8623@@27) 
(ARAY...,BRAY...) = (1@0,1@0) and (4631527@28, 8623355024) 
I, J and K=1 


The constructs containing ABS and DABS had an operand value of —12345. 
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Proc Speed : 5.00/10.00 
MCP : Mark I1.6 
ALGOL : Mark II.6 


SINGLE PRECISION REAL CONSTRUCTS 


Timings in 


ae Microseconds 
Construct 1.2 us Memory 1.6 us Memory 

ZREAL := XREAL + YREAL; 5.6 - 7.0 10.3 - 11.7 
ZREAL := XREAL - YREAL; 6.0 - 7.2 10.7 - 11.9 
ZREAL := XREAL * YREAL; 7.0 - 8.4 11.7 - 13.1 
ZREAL := XREAL / YREAL; 11.8 - 13.0 16.5 - 17.7 
ZREAL := XREAL DIV YREAL; 6.6 
ZREAL := 1; 2.8 4.5 
ZREAL := 1.0; 5.4 8.0 
ZREAL := 1@0; 5.4 8.0 
ZREAL := 97; 3.2 5.1 
ZREAL := 9701; 3.6 5.6 
ZREAL := 99999; 4.6 7.6 
ZREAL := 100000; 5.4 8.0 
ZREAL := 100001; 4.6 7.6 
ZREAL := 12345678; 4.6 7.6 
ZREAL := XREAL; 3.8 6.8 
ZREAL := XREAL + XREAL; 5.0 8.2 
ZREAL := XREAL + XREAL + XREAL: 6.6 11.6 
ZREAL := XREAL + XREAL + XREAL + XREAL; 8.8 14.9 
ZREAL := XREAL + XREAL + XREAL 10.0 18.3 

+ XREAL + XREAL; 
YREAL := YREAL + XREAL + XREAL 10.8 

+ XREAL + XREAL + XREAL; 
XREAL := XREAL + XREAL + XREAL 11.8 21.6 

+ XREAL + XREAL + XREAL; 
ZREAL := XREAL + XREAL + XREAL + XREAL 13.4 24.9 

+ XREAL + XREAL + XREAL; 
ZREAL := XREAL + XREAL + XREAL + XREAL 15.2 

+ XREAL + XREAL + XREAL + XREAL; 
ZREAL := ABS(XREAL) ; 5.5 8.8 
ZREAL := COSH (XREAL) ; 221.7 * 337.9 
ZREAL := EXP (XREAL); 166.1 * 253.9 


Proc Speed 
MCP 
ALGOL 
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5.00/10.00 
Mark II.6 
Mark II.6 


SINGLE PRECISION REAL CONSTRUCTS (Cont) 


ZREAL : 
ZREAL : 
ZREAL : 
ZREAL : 
YREAL : 


ALGOL 
Construct 


SIN (XREAL) ; 
SQRT (XREAL) ; 
XREAL + SQRT (XREAL) ; 
SQRT (ZREAL) ; 
YREAL + SQRT (YREAL) ; 


INTEGER CONSTRUCTS 


ZINTGR 
ZINTGR 


ZINTGR : 


ZINTGR 
ZINTGR 


ZINTGR ; 


ZINTGR 
ZINTGR 


ALGOL 
Construct 


XINTGR 
XINTGR 
XINTGR 
XINTGR 
1; 

97; 
XINTGR; 
ZINTGR; 


+ 


*K 


i 


YINTGR ; 
YINTGR; 
YINTGR; 
YINTGR ; 


System Timings 


ALGOL Construct Timings 


Timings in 
Microseconds 


i:2 us Memory 
145.1 
171.5 
174.4 
171.5 
169.6 


* %* &€ & * 


1.6 us Memory 


221.5 
252.3 
257.8 
252.3 
252.3 


Timings in 


Microseconds 


1.2 us Memory 
6.1 - 6.5 
6.1- 6.5 
7.5 7° 7.9 

14.9 - 15.5 


1.6 us Memory 


10.9 - 
10.9 - 
12.3 - 
19.7 - 


11.3 
11.3 
12.7 
20.3 
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Proc Speed : 5.00/10.00 
MCP : Mark II.6 
ALGOL : Mark II.6 


DOUBLE PRECISION REAL CONSTRUCTS 


ALGOL 
Construct 

ZDBL := XDBL + YDBL; 
ZDBL := XDBL — YDBL; 
ZDBL := XDBL * YDBL; 
ZDBL := XDBL / YDBL; 
ZDBL := 1@@0; 

ZDBL := 8@@0; 

ZDBL := XDBL; 

ZDBL := DABS (XDBL); 
ZDBL := DEXP (XDBL); 
ZDBL := DSIN (XDBL); 
ZDBL := DSQRT (XDBL) ; 


Timings in 
Microseconds 


1.2 us Memory 
10.0 - 11.6 
10.0 - 11.6 
16.6 
38.6 - 51.0 
6.6 
6.6 
6.4 
8.2 
571.7 
382.9 
237.3 


‘1.6 Us Memory 
17.6 -— 19.2 
17.6 - 19.2 
24,2 
48.2 - 60.6 
10.6 
10.6 
11.4 
13.4 
836.3 
576.7 
344.5 


Proc Speed : 


MCP 
ALGOL 


ARRAY CONSTRUCTS 


ARAY1 
ARAY1 
ARAY1 
ARAY1 


ZREAL : 
ZREAL : 
ZREAL : 


ZREAL 
ARAY2 
ARAY2 
ARAY2 
ARAY2 
ZREAL 
ARAY3 
ARAY3 
ARAY3 
ARAY3 
ZREAL 
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ALGOL Construct Timings 


5.00/10.00 


Mark 
Mark 


II.6 
11.6 


Timings in 
Microseconds 


ALGOL 

Construct 1.2 us Memory 1.6 us Memory 
{1] := XREAL; 5.6 9.9 
[1] := BRAY1 [1]; 7.6 13.0 
lI] := XREAL; 6.7 12.3 
[I] := BRAY1 [T]; 9.5 17.6 
:= ARAY] [I] + BRAY1 [I]; 11.2 - 12.6 20.6 - 22.0 
= ARAY1 [I] - BRAY1 [1]; 11.6 - 12.8 21.0 - 22.2 
= ARAY1 [1] * BRAY1 [1]; 14.0 23.4 
:= ZRZY1 [1] / BRAY1 [1]; 17.4 26.8 
[1,1] := XREAL; 8.7 14.3 
[1,1] := BRAY2 [1,1., 14.7 24.6 
[1,3] := XREAL; 10.5 18.7 
[1,J] := BRAY2 [I,J]; 18.4 33.4 
:= ARAY2 [I,J] + BRAY2 [I,J]; 18.9 - 20.3 35.3 - 36.7 
[1,1,1] := XREAL; 11.9 18.9 
[1,1,1] := BRAY3 [1,1,12, 23.7 38.4 
|1,J,K] := XREAL; 14.4 2523 
(I,J3,K] := BRAY3 [1,J,K]; . 29.6 52.1 
= ARAY3 'I,J,K] + BRAY3 [1,J,K]; 33.5 - 35.1 59.2 - 60.6 
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2-6 


NOTE 


These constructs call upon intrinsic routines of which each must be 
linked from the Dl stack prior to its first execution within a pro- 
gram. The first timing which includes intrinsic linkage will vary 
between 2 and 160 milliseconds, depending upon the presence or 
absence of certain MCP segments in main memory. The above timings 
were observed after the corresponding intrinsic was called once and 
linkage was thus established. 
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Section 3 
COBOL CONSTRUCT TIMINGS 


The Mark II.6 MCP and COBOL compiler were used in obtaining the following 
construct timings. Both 1.2 us and 1.6 us memories were used, and the resul- 
tant timings for both memory speeds are listed beside each construct on the 
following pages. 


The constructs have been grouped into twenty different "types" representing 


common data names and thus common data representations (pictures). 


Two timings are given for each construct within each memory speed in the 
first ten construct types. The first timing corresponds with the operand 
values: 


"X-...'' = +1 and "Y-..." = +1. 
The second timing resulted from using the operand values: 
"X-...'' = +6517 and "Y~-..." = -1740. 


The data names and their corresponding pictures and usages for the constructs 
timed are listed by type in the following WORKING-STORAGE SECTION. 
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DATA DIVISION. 
WORKING-STORAGE SECTION. 


TYPES 1 AND ll 


77 X-S7-CMP1 PIC S9(7) COMP-1. 

77 = Y-S7-CMP1 PIC S9(7) COMP-1. 

77 Z-S7-CMP1 PIC S9(7) COMP-1. 
TYPE 2 

77 = X-SSV2-CMP1 PIC 89(5) Vv99 COMP-1. 

77 Y-S5V2-CMP1 PIC S9(5) V99 COMP~1. 

77 = Z-S5SV2-CMP1 PIC 89(5)V99 COMP-1. 
TYPE 3 

77 X-JI7 PIC J9(7). 

77° Y-J7 PIC J9(7). 

77° Z-JI7 PIC J9(7). 
TYPE 4 

77 X-J5v2 PIC J9(5)V99. 

77 Y~-J5v2 PIC J9(5)V99. 

77°) = Z-JISV2 PIC J9(5)V99. 


TYPE 15 (PART 1) 


77 = X-S5-CMP1 PIC S9(5) COMP-1 
77 Y-JS PIC J9(5). 


TYPE 16 (PART 1) 


77 X-S10-CMP1 PIC S9(10) COMP-1. 
77 Y-J8 PIC J9(8). 
TYPE 17 
77 X-3-CMP1 PIC 999 COMP~1. 
77° Y-6-CMP1 PIC 9(6) COMP-1. 
77 Z-6-CMP2 PIC 9(6) COMP-2. 
77 W-J6-CMP2 PIC J9(6) COMP-2. 
TYPE 18 
77 NUM-3-CMP1 PIC 999 COMP-1. 


TYPE 19 (PART 1) 


77 SUB-2-CMP1 PIC 99 COMP~1. 
77 =INX1 INDEX. 
77 =X-X5 PIC X(5). 
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01 


Ol 


01 


01 


01 


TYPE 5 

WS-OP-1. 

03. X-S7-CMP PIC S89(7) COMP. 
03. Y-S7-CMP PIC S9(7) COMP. 
03 Z-S7-CMP PIC S9(7) COMP. 
TYPE 6 

WS~OP-2. 

03. X-S5V2-CMP PIC S9(5)V99 COMP. 
03) Y~SSV2-CMP PIC S9(5) Vv99 COMP. 
03. Z-SSV2-CMP PIC S9(5) V99 COMP. 
TYPE 7 

WS-OP-3. 

03° X-03-J7 PIC J9(7). 

03 Y-03-J7 PIC J9(7). 

03. Z-03-J7 PIC J9(7). 

TYPE 8 

WS-OP-4. 

03. X~-03-J5V2 PIC J9(5)V99. 

03 Y-03-J5V2 PIC J9(5)V99. 

03 Z-03-J5V2 PIC J9(5)V99. 

TYPE 9 

WS-OP-5. 

03 X-S7-CMP2 PIC S9(7) COMP-2. 
03 Y-S7-CMP2 PIC S9(7) COMP~2. 
03. Z-S7-CMP2 PIC S9(7) COMP-2. 
TYPE 10 

WS-OP-6. 

03 X-J7-CMP2 PIC J9(7) COMP-2. 
03. Y-J7-CMP2 PIC J9(7) COMP-2. 
03 Z-J7—CMP2 PIC J9(7) COMP-2. 
TYPE 12 

WS-OP-7. 

03 Xi1 PIC X. 

03 X6 PIC X(6). 

03 X25 PIC X(25). 

03 =X132 PIC X(132). 
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01 


01 


01 


01 


o1 


01 
01 


01 


TYPE 13 


WS-OP-8. 

03 X-7-CMP 
03. Y-5V2-CMP 
03 Z-Z7 

03 W-Z5P2 


TYPE 14 


WS-OP-9. 
03. X-S7-COMP 
03. Y-S7-COMP 
03. Z-S7-COMP 
03 A-J7 
03 B-J7 
03. C-J7 


TYPE 15 (PART 2) 


WS-OP-10. 
03 S-S5-CMP 
03 T-S5 
03 U-J5 
03. V-S5-CMP2 
03. W-J5-CMP2 


TYPE 16 (PART 2) 


WS-OP-11. 
03  U-S6-CMP 
03 V-J4 
03  W-J9-CMP2 
03. A7~X8 
03 B-X4 
88 B88 VALUE "YES" 
WS-OP-12 DISPLAY-1. 
03 C-X4-DISP1 


TYPE 19 (PART 2) 
WS-OP-13. 

03 SUB-X5-OC-10 
WS-OP-14. 

03. IDX~X5-0C-10 
TYPE 20 


WS-OP-15. 
03 XX~xX25 


PIC 9(7) COMP. 
PIC 9(5)Vv99 COMP. 
PIC Z(7). 


PIC Z(5).99. 


PIC 89(7) COMP. 
PIC S9(7) COMP. 
PIC S9(7) COMP. 
PIC J9(7). 

PIC J9(7). 

PIc J9(7). 

PIC S§9(5) COMP. 
PIC S9(5). 

PIC J9(5). 

PIC §9(5) COMP-2. 
PIc J9(5) COMP~2. 
PIC S9(6) COMP. 
PIC J9(4). 

PIC J9(9) COMP-2. 
PIC X(8). 

PIC X(4). 


PIC x(4) DISPLAY-1. 


PIC X(5) OCCURS 10 TIMES. 


PIC X(5) OCCURS 10 TIMES 
INDEXED BY INX2. 


PIC X OCCURS 25 TIMES. 
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Proc Speed : 5.00/10.00 
MCP : Mark II.6 
COBOL : Mark I1.6 


TYPE 1 CONSTRUCTS 


COBOL 
Construct 


ADD X-S7-CMP1, Y-S7-CMP1 GIVING Z-S7-CMP1. 
COMPUTE Z-S7-CMP1 = X-S7-CMP1 + Y~S7-CMP1. 


SUBTRACT Y~S7-CMP1 FROM X-S7-CMP1 GIVING 
Z~S7-CMP1. 


COMPUTE Z-S7-CMP1 = X-S7-CMP1 ~ Y~S7-CMP1. 


MULTIPLY X-S7-CMP1 BY Y-S7-CMP1 GIVING 
Z-S7-CMP1. 


COMPUTE Z-S7-CMP1 = X-S7-CMP1 * Y~-S7-CMP1. 


DIVIDE X~S7-CMP1 BY Y-S7-CMP1 GIVING 
Z-S7-CMP1. 


COMPUTE Z-S7-CMP1 = X-S7-CMP1 / Y-S7-CMP1. 


TYPE 2 CONSTRUCTS 


COBOL 
Construct 


ADD X~S5V2-CMP1, Y-S5V2-CMP1 GIVING 
Z-S5SV2-CMP1. 


COMPUTE Z-S5V2-CMP1 = X-SS5V2-CMP1 + 
Y-S5V2-CMP1. 


SUBTRACT Y-S5V2-CMP1 FROM X-SS5V2-CMP1 
GIVING Z-S5V2-CMP1. 


COMPUTE Z-S5V2-CMP1 = X-S5V2-CMP1 - 
Y~-S5V2-CMP1. 


MULTIPLY X-S5V2-CMP1 BY Y-S5V2-CMP1 GIVING 
Z-SSV2-CMP1. 


COMPUTE Z-S5V2-CMP1 = X-S5V2-CMP1l * 
Y-S5V2-CMP1. 


DIVIDE X~S5V2-CMP1 BY Y~S5V2-CMP1 GIVING 
Z-S5V2-CMP1. 


COMPUTE Z-S5V2-CMP1 = X~S5V2-CMP1 / 
Y-S5V2-CMP1. 


1.2 us Memory 


5.6 
8.0 


1.2 us Memory 


21.1 


20.8 


COBOL Construct Timings 


Timings in 
Microseconds 


6.0 
8.4 


1.6 us Memory 


10.3 
14.7 


11.2 
14.7 


17.5 
16.9 


24.5 
23.9 


Timings in 
Microseconds 


21.5 


21.2 


10.7 
15.1 


11.6 
15.1 


17.9 
17.3 


24.9 
24.3 


1.6 us Memory 


10.3 


14.7 


11.2 


14.7 


28.0 


27.2 


28.7 


28.2 


10.7 


15.1 


11.6 


15.1 


28.4 


27.6 


29.1 


28.6 
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Proc Speed : 5.00/10.00 
MCP : Mark II.6 
COBOL : Mark II.6 


TYPE 3 CONSTRUCTS 


COBOL 

Construct 
ADD X-J7, Y-J7 GIVING Z-J7. 
COMPUTE Z-J7 = X-J7 + Y-J7. 
SUBTRACT Y-J7 FROM X-J7 GIVING Z~-J7. 
COMPUTE Z-J7 = X-J7 - Y-J7. 
MULTIPLY X-J7 BY Y-J7 GIVING Z-J7. 
COMPUTE Z-J7 = X-J7 * Y-J7. 
DIVIDE X-J7 BY Y-J7 GIVING Z-J7. 
COMPUTE Z-J7 = X-J7 / Y-J7. 


TYPE 4 CONSTRUCTS 


COBOL 
Construct 


ADD X-J5V2, Y-J5V2 GIVING Z-J5V2. 
COMPUTE Z-J5V2 = X-J5V2 + Y-J5V2. 


SUBTRACT Y-J5V2 FROM X~J5V2 GIVING Z-JSV2. 


COMPUTE Z-J5V2 = X-J5V2 - Y-J5V2. 
MULTIPLY X-J5V2 BY Y-J5V2 GIVING Z-J5vV2. 
COMPUTE Z~-J5V2 = X-J5V2 * Y-J5V2. 

DIVIDE X-J5V2 BY Y-J5V2 GIVING Z-J5V2. 
COMPUTE Z-J5V2 = X-J5V2 / Y-J5V2. 


Timings in 
Microseconds 


1.2 us Memory 


169.0 
166. 
167. 
164. 
172. 
167. 
178. 
175. 


KF On ON NY WN 


169. 
166. 
169. 
166. 
173. 
168, 
178. 
175. 


ort O WN NN PF 


1.6 us Memory 


235.4 
230. 
233. 
228, 
241, 
232. 
244, 
239, 


nor FD Fk DH 


Timings in 
Microseconds 


1.2 us Memory 


169. 
166. 
166. 
164 
183. 
177. 
181. 
179. 


oP N NUM ND DO DY CO 


- 169, 
- 166. 


169. 
166. 


- 183. 


178. 
181. 
179. 


awornny od 


235. 
231. 
235. 
230. 
241, 
232. 
245. 
240. 


oN FN HD PP Ht 


1.6 us Memory 


235, 
230. 
233. 
228. 
252. 
242. 
248. 
244, 


FE oumoenm fk OH 


- 235.8 
- 231.0 
- 235.4 
- 230.6 
- 252.4 


242.8 
249.2 
244.5 
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Proc Speed 5.00/10.00 
MCP Mark I1.6 
COBOL Mark II.6 


TYPE 5 CONSTRUCTS 


COBOL 
Construct 
ADD X-S7-CMP, Y-S7-CMP GIVING Z-S7-CMP. 
COMPUTE Z-S7-CMP = X-S7-CMP + Y~S7-CMP. 


SUBTRACT Y-S7-CMP FROM X-S7-CMP GIVING 
Z-S7-CMP. 


COMPUTE Z-S7-CMP = X-S7-CMP - Y-S7-CMP. 


MULTIPLY X-S7-CMP BY Y-S7-CMP GIVING 
Z~S7-CMP. 


COMPUTE Z-S7-CMP = X~S7-CMP * Y-S7~-CMP. 


DIVIDE X-S7-CMP BY Y-S7-CMP GIVING 
Z-S7-CMP. 


COMPUTE Z-S7-CMP = X-S7-CMP / Y-S7-CMP. 


TYPE 6 CONSTRUCTS 


COBOL 
Construct 
ADD X-S5V2-CMP, Y-S5V2-CMP GIVING Z-S5V2~-CMP. 
COMPUTE Z-S5V2-CMP = X~SS5V2-CMP + Y-S5V2-CMP. 


SUBTRACT Y-S5V2-CMP FROM Y~S5V2-CMP GIVING 
Z-S5V2-CMP. 


COMPUTE Z-S5V2-CMP = X-S5V2-CMP - Y~-S5V2~-CMP. 


MULTIPLY X-S5V2-CMP BY Y-S5V2-CMP GIVING 
Z-S5V2~-CMP. 


COMPUTE Z-S5V2-CMP = X~SSV2-CMP * 
Y-S5V2-CMP. 


DIVIDE X-S5V2-CMP BY Y~S5V2-CMP GIVING 
Z-S5V2-CMP. 


COMPUTE Z-S5V2-CMP = X-S5V2-CMP / 
Y-S5V2-CMP. 


1.2 us Memory 


12. 
13. 


12. 
13. 


16. 
15. 


23, 
22. 


1.2 us Memory 


3 
8 


4 
8 


3 


12.1 7 


13.8 


12.1 
13.8 


COBOL Construct Timings 


Timings in 


Microseconds 


1.6 us Memory 


12.7 20.7 7 
14.2 24.2 7 
12.8 21.1 - 
14.2 24.2 - 
16.7 26.8 — 
16.2 26.3 - 
23.7 33.8 - 
23.2 33.4 7 
Timings in 
Microseconds 


12. 
14. 


12. 
14. 


27. 


26. 


5 
2 


) 


21.1 
24.6 


21.5 
24.6 


27.2 
26.7 


34.2 
33.8 


1.6 ws Memory 


20. 
24, 


20.7 
24. 


{= 
2- 


36.7 7 


38.9 - 


37.7 — 


21.1 
24.6 


21.1 
24.6 


39.3 


37,1 


39.3 


38,1 
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COBOL Construct Timings 


Proc Speed 5.00/10.00 
MCP Mark II.6 
COBOL Mark I1I.6 


TYPE 7 CONSTRUCTS 


Timings in 


Microseconds 
COBOL 
Construct 1.2 us Memory 1.6 us Memory 
ADD X-03-J7, Y-O3-J7 GIVING Z-03-J7. 168.0 - 168.3 234.3 - 234.8 
COMPUTE Z-03-J7 = X-03-J7 + Y-03-J7. 165.2 - 165.6 229.6 - 230.0 
SUBTRACT Y-03-J7 FROM X-03-J7 GIVING Z-03-J7. 169.3 - 171.3 237.1 —- 239.1 
COMPUTE Z-03-J7 = X-03-J7 - Y~-03~-J7. 163.2 - 165.2 227.6 - 229.6 
MULTIPLY X-03-J7 BY Y-03-J7 GIVING Z-03-J7. 171.9 - 172.3 240.3 - 240.8 
COMPUTE Z-03-J7 = X-03-J7 * Y-03-J7. 166.6 - 167.0 231.1 - 231.4 
DIVIDE X-03-J7 BY Y-03~-J7 GIVING Z-03-J7. 177.0 - 177.4 243.7 - 244.1 
COMPUTE Z-03-J7 = X-03-J7 / Y-03-J7. 174.1 - 174.5 238.6 - 239.0 
TYPE 8 CONSTRUCTS 
Timings in 
Microseconds 
COBOL 
Construct 1.2 us Memory 1.6 Us Memory 
ADD X-03-J5V2, Y-03-J5V2 GIVING Z~-03-J5v2. 168.0 - 168.3 234.3 - 234.8 
COMPUTE Z-03-J5V2 = X-03-J5V2 + Y-03-J5v2. 165.2 - 165.6 229.6 - 230.0 
SUBTRACT Y-03-J5V2 FROM X-03-J5V2 GIVING 
Z-03-J5V2. 165.9 - 167.9 232.4 - 234.3 
COMPUTE Z-03-J5V2 = X-03-J5V2 - Y-03-J5V2. 163.2 - 165.2 227.6 - 229.6 
MULTIPLY X-03-J5V2 BY Y-03-J5V2 GIVING 
Z-03-J5V2. 182.2 - 182.6 251.0 - 251.5 
COMPUTE Z-03-J5V2 = X-03-J5V2 * Y-O03-J5V2. 176.8 - 177.1 241.5 - 241.9 
DIVIDE X-03-J5V2 BY Y-03-J5V2 GIVING 

Z-03-J5V2. 180.4 - 180.8 247.8 - 248.3 
COMPUTE Z-03-J5V2 = X-03-J5V2 / Y-03-J5vV2. 178.1 - 178.5 243.1 - 243.5 
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Proc Speed : 5.00/10.00 
MCP : Mark II.6 
COBOL : Mark II.6 


TYPE 9 CONSTRUCTS 


COBOL 
Construct 
ADD X-S7-CMP2, Y-S7-CMP2 GIVING Z-S7-CMP2. 
COMPUTE Z-S7-CMP2 = X-S7-CMP2 + Y-S7-CMP2. 


SUBTRACT Y-S7-CMP2 FROM X-S7-CMP2 GIVING 
Z-S7-CMP2. 


COMPUTE Z-S7~-CMP2 = X-S7-CMP2 - Y~S7-CMP2. 


MULTIPLY X-S7-CMP2 BY Y-S7-CMP2 GIVING 
Z~S7~CMP2. 


COMPUTE Z-S7-CMP2 = X-S7-CMP2 * Y~S7-CMP2. 


DIVIDE X-S7-CMP2 BY Y-S7-CMP2 GIVING 
Z-S7-CMP2. 


COMPUTE Z-S7-CMP2 = X-S7-CMP2 / Y-S7-CMP2. 


TYPE 10 CONSTRUCTS 


COBOL 
Construct 
ADD X-J7-CMP2, Y-J7-CMP2 GIVING Z-J7-CMP2. 
COMPUTE Z-J7-~CMP2 = X-J7-CMP2 + Y-J7-CMP2. 


SUBTRACT Y-J7-CMP2 FROM X-J7-CMP2 GIVING 
Z- J7-CMP2. 


COMPUTE Z~J7-CMP2 = X-J7~CMP2 - Y~J7~-CMP2. 


MULTIPLY X-J7-~CMP2 BY Y-J7-CMP2 GIVING 
Z-J7-CMP2. 


COMPUTE Z-J7-CMP2 = X-J7-CMP2 * Y-J7-CMP2. 


DIVIDE X-J7-CMP2 BY Y-J7-CMP2 GIVING 
Z~J7-CMP2. 


COMPUTE Z-J7-CMP2 = X-J7-CMP2 / Y-J7-CMP2. 


COBOL Construct Timings 


Timings in 
Microseconds 


1.2 us Memory 


94.6 
91.8 


92.6 
89.8 


98.5 
93.2 


103.6 


~- 


100.9 - 


95.0 
92.2 


94.6 
91.8 


98.9 
93.6 


104.0 
101.3 


1.6 us Memory 


125.3 
120.3 


123.3 
118.3 


131.3 
121.7 


134.5 
129.5 


Timings in 
Microseconds 


1.2 us Memory 


138.5 
135.7 


136.5 
133.7 


144.9 
139.5 


147.5 
144.7 


139.1 
136.3 


138.7 
135.9 


145.4 
140.1 


148.0 
145.2 


125.7 
120.7 


125.3 
120.3 


131.7 
122.1 


134.9 
130.1 


1.6 us Memory 
187.5 - 188.1 


182.6 


185.5 
180.6 


197.8 
188.4 


196.8 
191.7 


183.2 


187.7 
182.8 


198.4 
189.0 


197.4 
192.3 
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COBOL Construct Timings 


Proc Speed : 5.00/10.00 
MCP : Mark II.6 
COBOL : Mark I1.6 


TYPE 11 CONSTRUCTS 


Timings in 


Microseconds 
COBOL 

Construct 1.2 us Memory 1.6 us Memory 
ADD 1 TO X-S7-CMP1. 4.7 8.0 
COMPUTE X-S7-CMP1 = X-S7-CMP1 + 1. 6.7 12.1 
ADD 1, X-S7-CMP1 GIVING Z-S7-CMP1. 4.5 7.8 
COMPUTE Z-S7-CMP1 = X~S7-CMP1 + l. 6.7 12.1 
ADD 1, X-S7-CMP1, Y-S7-CMP1 GIVING Z-S7-CMP1. 6.2 - 6.6 11.2 - 11.6 
COMPUTE Z-S7-CMP1 = Y~S7-CMP1 + X~S7-CMP1 + 1. 8.7 - 9.1 15.7 - 16.1 
MULTIPLY 1 BY X-S7-CMP1. 9.6 - 10.0 15.3 - 15.7 
MULTIPLY 1 BY X-S7-CMP1 GIVING Z-S7-CMP1l. 9.6 - 10.0 15.3 - 15.7 
DIVIDE 1 INTO X-S7-CMPI. 15.7 21.2 
DIVIDE 1 INTO X-S7-CMP1 GIVING Z-S7-CMP1. 16.6 22.3 
DIVIDE X-S7-CMP1 BY 2 GIVING Z-S7-CMP1 

REMAINDER Y-S7-CMP1. 44.4 - 46.2 66.5 - 68.3 


NOTE 


Where there are two timings for a construct 
within a memory speed above, the first 


timing represents operand values 
X-S7-CMP1 = +1 and Y-S7-CMP1 = +1 
and the second timing represents operand values 


X-S7-CMP1 = +6517 and Y-S7-CMP1 = -1740 
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Proc 
MCP 


COBOL 


Burroughs ~- B 6700 System Timings 


Speed 5.00/10.00 
Mark II.6 
Mark II.6 


TYPE 12 CONSTRUCTS 


MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 


COBOL 
Construct 
SPACE TO Xl. 
SPACE TO X6. 
SPACE TO X25. 
SPACE TO X132. 
SPACE TO WS-OP-7. 
SPACE TO Xl, X6, X25, X132. 
"A" TO Xl. 
"A" TO X6. 
"A' TO X25. 
ALL "A" TO X6. 
ALL "A" TO X25. 
ALL "A" TO X6, X25. 
X6 TO X25. 
X25 TO X6. 


TYPE 13 CONSTRUCTS 


MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 


COBOL 

Construct 
O TO X-7-CMP. 
0 TO Y-5V2-CMP. 
0.00 TO Y-5V2-CMP. 
2 TO X-7-CMP. 
97 TO X-7-CMP. 
9.7 TO Y-5V2-CMP. 
12345 TO X-7-CMP. 
123.45 TO Y-5V2-CMP. 
X-7-CMP TO Y~-5V2-CMP. 
Y-5V2-CMP TO X-7-CMP. 
X-7-CMP TO Z-Z7. 
Y-5V2-CMP TO W-Z5P2. 


COBOL Construct Timings 


Timings in 
Microseconds 


1.2 us Memory 


1.6 us Memory 


20.1 30.6 
25.9 37.7 
37.7 52.7 
79.1 122.6 
69.4 111.6 
162.8 243.7 
18.1 24.6 
35.9 49.3 
48.9 69.1 
27.2 39.4 
38.8 54.0 
66.0 93.4 
62.4 90.2 
34.4 49.2 
Timings in 
Microseconds 


1.2 us Memory 


4.8 
4.6 
4.6 
5.2 
5.2 
13.0 
5.5 
5.5 
14.6 
17.0 
37.4 
83.2 


1.6 tts Memory 


8.2 


8.4 
18.6 
8.9 
8.9 
22.4 
24.9 
53.4 
118.5 
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COBOL Construct Timings 


Proc Speed 5.00/10.00 
MCP Mark II.6 
COBOL Mark II.6 


TYPE 14 CONSTRUCTS 


Timings in 
Microseconds 


COBOL Relationship 1.2 us 1.6 us 

Construct of Operands Memory Memory 

P100. GO TO P200. 1.7 2.8 
P200. IF X-S7-COMP = Y-S7-COMP GO TO P300. EQUAL 9.9 16.7 
P200. IF X-S7-COMP = Y-S7-COMP GO TO P300. NOT EQUAL 8.7 14.5 
P300. IF A-J7 = B-J7 GO TO P400. EQUAL 109.3 150.2 
P300. IF A-J7 B-J7 GO TO P400. NOT EQUAL 108.1 148.0 
IF X-S7-COMP = Y-S7-COMP ADD 1 TO Z-S7-COMP. EQUAL 19.1 31.7 
IF X-S7-COMP = Y-S7-COMP ADD 1 TO Z-S7~COMP. NOT EQUAL 9.3 15.9 
IF X-S7-COMP < Y-S7-COMP ADD 1 TO Z-S7-COMP. LESS THAN 18.9 31.5 
IF X-S7-COMP < Y~S7-COMP ADD 1 TO Z-S7-COMP. NOT LESS THAN 9.5 16.1 
IF X-S7-COMP > Y-S7-COMP ADD 1 TO Z-S7-COMP. GREATER THAN 19.1 31.7 
IF X-S7-COMP > Y-S7-COMP ADD 1 TO Z-S7-COMP. NOT GREATER THAN 9.5 16.1 
IF A-J7 = B-J7 ADD 1 TO C-J7. EQUAL 215.6 297.7 
IF A-J7 = B-J7 ADD 1 TO C-J7 NOT EQUAL 108.9 149.6 
COMPUTE Y-S7-COMP = ABS(X-S7~COMP). X-S7-COMP = 1 11.5 19.2 
COMPUTE Y-S7-COMP = ABS(X~S7-COMP). X~-S7~COMP = -1 11.5 19.2 
COMPUTE Y-S7-COMP = SIN(X~S7-COMP). X-S7-COMP = 1 149.5 * 228.4 
COMPUTE Y-S7-COMP = SIN(X-S7-COMP). X-S7-COMP = 4 198.5 * 304.2 
COMPUTE Y-S7-COMP = SQRT(X-S7-COMP). X-S7~COMP = 1 175.9 * 259.2 
COMPUTE Y-S7-COMP = SQRT(X-S7-COMP). X-S7-COMP = 4 167.9 * 251.2 


* These constructs call upon intrinsic routines of which each must be linked 
The first 
timing, which includes intrinsic linkage, will vary between 2 and 160 milli- 


from the Dl stack prior to its first execution within a program. 
seconds, depending upon the presence or absence of certain MCP segments in 
main memory. The timings shown for these constructs were observed after the 


corresponding intrinsic was called once and linkage was thus established, 


3712 
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COBOL Construct Timings 


Proc Speed 5.00/10.00 
MCP Mark II.6 
COBOL Mark II.6 
TYPE 15 CONSTRUCTS 
NOTE: All conditions below are satisfied (equal) 


Timings in 


Microseconds 
COBOL 
Construct 1.2 us Memory 1.6 us Memory 
P110. IF X-S5-CMP1 = Y-J5 GO TO P210. 56.2 78.9 
P210. IF X-S5-CMP1 = S-S5-CMP GO TO P310. 7.6 12.9 
P310. IF X-S5-CMP1 = T-S5 GO TO P410. 34.1 47.7 
P410. IF X-S5-CMP1 = U-J5 GO TO P510. 56.5 79.5 
P510. IF X-S5-CMP1 = V-S5-CMP2 GO TO P610. 36.2 50.8 
P610. IF X-S5-CMP1 = W-J5-CMP2 GO TO P710. 51.6 71.3 
P710. IF Y-J5 = S-S5-CMP GO TO P810. 55.7 1hs2 
P810. IF Y-J5 = T-S5 GO TO P910. 81.5 110.8 
P910. IF Y-J5 = U-J5 GO TO Qllo. 105.7 145.2 
Ql10. IF Y-J5 = V-S5-CMP2 GO TO Q210. 83.6 113.9 
Q210. IF Y-J5 = W-J5-CMP2 GO TO Q310. 99.4 135.0 
Q310. IF S-S5-CMP = T-S5 GO TO Q410. 36.0 50.8 
Q410. IF S-S5-CMP = U-J5 GO TO Q510. 59.6 84.3 
Q510. IF S-S5~CMP = V-S5-CMP2 GO TO Q610. 38.0 53.8 
Q610. IF S-S5-CMP = W-J5-CMP2 GO TO Q710. 53.6 74.5 
Q710. IF T-S5 = U-J5 GO TO Q810. 83.8 114.4 
Q810. IF T-S5 = V-S5-CMP2 GO TO Q910. 61.6 82.7 
Q910. IF T-S5 = W-J5-CMP2 GO TO R110. 77.3 103.8 
R110. IF U-J5 = V-S5-CMP2 GO TO R210. 85.7 117.3 
R210. IF U-J5 = W-J5-CMP2 GO TO R310. 101.4 138.3 
R310. IF V-S5-CMP2 = W-J5-CMP2 GO TO R410. 79.3 106.8 
R410. IF X-S5-CMP1 = +1 GO TO R510. 5.3 8.6 


R510. 
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COBOL Construct Timings 


Proc Speed : 


MCP 
COBOL 


Mark 


TYPE 16 CONSTRUCTS 


NOTE: 
p120. IF 
p220. IF 
P320. IF 
p420. IF 
P520. IF 
P620. IF 
p720. IF 
P820. IF 
p920. IF 
Q120. IF 
Q220. IF 
Q320. IF 
Q420. IF 
Q520. IF 
Q620. IF 
Q720. IF 
GO 
Q820. IF 
Q920. IF 
GO 
R120. IF 
R220. IF 
GO 
R320. IF 
R420. IF 
IF 
R520. IF 
R620. 


3-14 


5.00/10.00 
Mark II.6 
I1I.6 


Burroughs — B 6700 System Timings 


All conditions below are satisfied (equal) 


COBOL 

Construct 
X-S10-CMP1 = Y-~J8 GO TO P220. 
X-S10-CMP1 = U~S6-CMP GO TO P320. 
X-S10-CMP1 = V-J4 GO TO P420. 
X-S10-CMP1 = W-J9~CMP2 GO TO P520. 
Y-J8 = U-S6-CMP GO TO P620. 
Y-J8 = V-J4 GO TO P720. 
Y-J8 = W-J9-CMP2 GO TO P820. 
U-S6-CMP = V-J4 GO TO P920. 
U-S6-CMP = W-J9-CMP2 GO TO Q120. 
V-J4 = W-J9-CMP2 GO TO Q220. 
A-X8 = B-X4 GO TO Q320. 
A-X8 = "YES" GO TO Q420. 
A-X8 = "YES " GO TO Q520. 
B-X4 = "YES" GO TO Q620. 
B88 GO TO Q720. 
A-X8 = "XXX" OR A~X8 = "YES" 
TO Q820. 
A-X8 = "XXX" OR "YES" GO TO Q920. 
A-X8 = "XXX" OR B-X4 = "YES" 
TO R120. 
A-X8 = "XXX" OR B88 GO TO R220. 
A-X8 = "YES" AND B-X4 = "YES" 
TO R320. 
A-X8 = "YES" AND B88 GO TO R420. 
A-X8 = "XXX" GO TO P120 ELSE 
A-X8 = "YES" GO TO R520. 
B-X4 = C-X4-DISP1 GO TO R620. 


Timings in 
Microseconds 


1.2 us Memory 


56.0 
7.7 
55.0 
55.0 
55.6 
102.8 
102.1 
56.8 
56.6 
101.5 
78.4 
35.3 
35.3 
27.7 
27.7 


69.5 
69.5 


60.8 
60.8 


61.0 
61.0 


69.5 
65.9 


1.6 us Memory 


79.6 
13.0 
77.4 
76.0 
78.2 
142.4 
139.7 
80.5 
78.5 
138.3 
116.4 
51.2 
51.2 
37.8 
37.8 


100.2 
100.2 


84.6 
84.6 


84.8 
84.8 


100.2 
97.7 


Proc Speed 


MCP 
COBOL 


Burroughs - B 6700 System Timings 


5.00/10.00 
Mark II.6 
Mark II.6 


TYPE 17 CONSTRUCTS 


P130. 
p230. 
P330. 
P430. 
P530. 
P630. 
P730. 
P830. 
P930. 
Q130. 
Q230. 
Q330. 
Q430. 
Q530. 
Q630. 
Q730. 


Q830. 
Q930. 


R130. 


R230 


COBOL 

Construct 
X-3-CMP1 =~ O GO TO P230. 
X-3-CMP1 EQUAL O GO TO P330. 
X-3-CMP1 = 1 GO TO P430. 
Y-6-CMP1 = 1 GO TO P530. 
Z-6-CMP2 = 1 GO TO P630. 
W- J6-CMP2 = 1 GO TO P730. 
X-3-CMP1 = 2 GO TO P830. 
X-3-CMP1 = 3 GO TO P930. 
X-3-CMP1 = 10 GO TO Q130. 
X-3-CMP1 = 97 GO TO Q230. 
X-3-CMP1 = 100 GO TO Q330. 
Y-6-CMP1 = 9701 GO TO Q430. 
Y-6-CMP1 = 99999 GO TO Q530. 
Y-6-CMP1 = 100000 GO TO Q630. 
Y-6-CMP1 = 100001 GO TO Q730. 
X-3-CMP1 = O OR X-3-CMPI1 = 1 
TO Q830. 
X-3-CMP1 = O OR 1 GO TO Q930. 
X-3-CMP1 = 1 AND Y-6-CMP1 = 1 
TO R130. 
X-3-CMP1 = O GO TO P130 ELSE 
Y-6-CMP1 = 1 GO TO R230. 


COBOL Construct Timings 


Timings in 
Microseconds 


1.2 us Memory 


4.8 
4.9 
5.3 
5.3 
32.1 
49.2 
5.5 
5.5 
5.5 
5.4 
5.4 
6.2 
7.7 
7.7 
7.7 


1.6 us Memory 


8.0 
8.2 
8.6 
8.6 
42.1 
65.8 
8.8 
8.8 
8.8 
8.7 
8.7 
10.1 
13.2 
13.2 
13.2 


14.6 
14.4 


15.0 


14.3 
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COBOL Construct Timings 


Proc Speed 5.00/10.00 


MCP 
COBOL 


Mark II.6 
Mark II.6 


TYPE 18 CONSTRUCTS 


COBOL 
Construct 


ALTER PARG-GOTO TO PROCEED TO 
PARG-NOP. 


PERFORM PARG-NOP. 

PERFORM PARG-NOP NUM-3-CMP1 TIMES. 
PERFORM PARG-NOP NUM-3-CMP1 TIMES. 
PERFORM PARG-NOP VARYING NUM-3~-CMP1 


FROM 1 BY 1 UNTIL NUM-3-CMP1 > 10. 


PERFORM PARG-NOP VARYING NUM~3-CMP1 


FROM 1 BY 1 UNTIL NUM-3-CMP1 > 100. 


P140. 
p140. 
P140. 
P140. 
P140. 
P140. 


GO TO 


3-16 


GO TO P141, P142, P143, Pi44 
DEPENDING ON NUM~-3~CMP1. 


GO TO P141, P142, P143, P144 
DEPENDING ON NUM-3-CMP1. 


GO TO P141, P142, P143, P144 
DEPENDING ON NUM-3-CMP1. 


GO TO P141, P142, P143, P144 
DEPENDING ON NUM~3-CMP1. 


GO TO P141, P142, P143, P144 
DEPENDING ON NUM-3-CMP1. 


GO TO P141, P142, P143, P144 
DEPENDING ON NUM-3-CMP1. 


NUM 
VALUE 


10 
100 


NOTE: This GO TO has been altered, 


Timings in 
Microseconds 


1.2 us Memory 


3.2 
21.1 
276.0 
2652.0 


311.4 
3029.4 
15.8 
21.6 
21.6 
21.6 
21.8 


16.7 
6.5 


1.6 us Memory 


35.0 
457.2 
4417.2 


512.6 


4994.6 


34.4 


34.4 


34.6 


27.2 
11.3 


Proc 
MCP 


COBOL 
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Speed : 5.00/10.00 
Mark I1I.6 
Mark I1.6 


TYPE 19 CONSTRUCTS 


COBOL 
Construct 


MOVE 5 TO SUB-2-CMPI1. 
MOVE X-X5 TO SUB-X5-0C-10 (SUB-2-CMP1). 


SET 
SET 
SET 


INX1 TO INX2. 
INX2 TO INX1. 
INX2 TO 5. 


MOVE X-X5 TO IDX“X5~-0C~10(INX2). 


SET 


SET 


SET 


SET 


SET 


SET 


INX2 UP BY 1. 
INX2 TO l. 


INX2 TO 1. SEARCH IDX~X5-0C-10; WHEN 
IDX~X5~-OC-10(INX2) = "H*¥1*T" 
NEXT SENTENCE. 


NOTE: IDX~-X5-OC-10(1) = "H*I*T". 
INX2 TO 1. SEARCH IDX-X5-0C-10; WHEN 


IDX-X5-0C~-10(INX2) = "H*I*T" 
NEXT SENTENCE. 


NOTE: IDX~X5-0C-10(5) = "H*I*T". 
INX2 TO 1. SEARCH IDX~-X5-0C-10; WHEN 


IDX-X5-OC-10(INX2) = "H*1*T" 
NEXT SENTENCE. 


NOTE: IDX~X5-0C~-10(10) = "H*I*T", 
INX2 TO 1. SEARCH IDX~X5-0C-10; WHEN 


IDX-X5-OC~10(INX2) = "H*I*T" 
NEXT SENTENCE. 


NOTE: IDX~X5-O0C~-10(INX2) NOT = "H*¥I*T", 
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Timings in 
Microseconds 


1.2 us Memory 


3.2 
40.6 
3.8 
3.8 
3.2 
35.2 
5.1 
2.8 


30.8 


173.0 


348.2 


354.4 


i.6 us Memory 


5.0 
57.0 
6.8 
6.8 
5.0 
49.6 
8.6 
4.5 


44.8 


248.6 


498.9 


508.2 


3-17 
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COBOL Construct Timings 


Proc Speed 5.00/10.00 
MCP Mark II.6 
COBOL Mark II.6 


TYPE 20 CONSTRUCTS 


EXAMINE 
FIRST 


EXAMINE 
FIRST 


EXAMINE 
FIRST 


EXAMINE 
FIRST 


EXAMINE 
FIRST 


EXAMINE 


COBOL 
Construct 


WS-OP-15 
yt 
WS-OP-15 
they 
WS-OP-15 
wytt 
WS-OP-15 
yt. 
WS-OP-15 
yt, 
WS-OP-15 


ALL '"X". 


EXAMINE WS-OP-15 
ALL "X". 


EXAMINE WS-OP-15 
ALL "X". 


EXAMINE WS~-OP-15 
ALL '"X". 


EXAMINE WS-OP-15 
ALL "X". 


EXAMINE WS-OP-15 


ALL wy BY ty" a 


EXAMINE WS-OP-15 


ALL Ae BY myn % 


EXAMINE WS-OP-15 


ALL Lad. Gi BY ty é 


EXAMINE WS-OP-15 


ALL wy BY try * 


EXAMINE WS~OP-15 


ALL "X" BY "Y". 


TALLYING UNTIL 


TALLYING UNTIL 


TALLYING UNTIL 


TALLYING UNTIL 


TALLYING UNTIL 


TALLYING 
TALLYING 
TALLY ING 
TALLY ING 
TALLY ING 
REPLACING 
REPLACING 
REPLACING 
REPLACING 


REPLACING 


XX 


VALUE 


lst POS="X' 


2nd POS="X" 


5th POS="'X" 


10th 


25th 


NO 


25 


NO 


10 


25 


POS=""X' 


POS=""X" 


Timings in 


Microseconds 


1.2 us Memory 


33.4 


33.8 


35.0 


37.4 


44.6 


42.9 


82.5 


241.4 


439.6 


1033.8 


40.0 


82.6 


293.5 


465.7 


1102.1 


1.6 us Memory 


49.1 


49.1 


49.7 


52.1 


60.3 


57.8 


119.1 


365.9 


673.6 


1594.6 


53.1 


118.7 


382.7 


709.9 


1689.3 
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Section 4 
FORTRAN CONSTRUCT TIMINGS 


The following measurements were performed on various FORTRAN constructs using 
the Burroughs Mark II.6 release FORTRAN Compiler. Both 1.2 ps and 1.6 us 
memories were utilized, and the timings of a particular construct for each 
memory are shown side-by-side on the following pages. The asterisk(s) between 
the timing results refer to notes which are located on page 4-6. 


Ranges in times for a given construct are simply differences due to the oper- 
and values used in the execution of the construct. 


Certain variables are used exclusively for each general type of construct. 
These are: 


Single Precision Real X, Y, Z 
Integer L, M, N 
Double Precision Real D, E, F 
Complex A, B, C 


The permissible combinations of operand values (limited by overflow, underflow, 
division by zero, etc.) with which the timings were taken are given in the 
following table. Constructs which contain both variables were timed using all 
possible combinations of the operand values given. Thus, the construct 

"Z = X + Y" was timed using 25 different pairs of operand values for X and Y. 
Constructs containing only one variable were timed using those operand values 
beneath that variable in the table. Hence, the construct "Z = ABS (Y)" was 
timed using 5 different operand values for Y. 
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FORTRAN Construct Timings 


SINGLE PRECISION REAL 


0. 0000000E+ 00 
0. 1000000E+ 01 


0.4000000E+ 01 
0.4631527E+35 
0.6517000E-33 


-.1740000E-32 
0. OOOO0000E+ 00 
0. 1000000E+ 01 
0.4000000E+01 
0.8623355E+31 


DOUBLE PRECISION REAL 


0.0000D+ 00000 
0. 1000D+ 00001 


0.4000D+ 00001 
0.4632D+ 00035 
0.6517D-00033 


-.1740D-00032 
0.1000D+ 00001 
0.3778D+ 04095 
0.4000D+ 00001 
0.8623D+ 00031 


INTEGER 


COMPLEX 


(0.00000E+00, 0.00000E+ 00) 
(0.10000E+01,0. 10000E+ 01) 
(0. 15000E+01,0.15000E+01) 
(0.65170E+13,0.65170E-13) 
(0.86234E+17,0.86234E-17) 


(-.46315E+35,-.65170E-13) 
(-.86234E+17,0.17400E-32) 
(0. LOOOOE+ 01,0. 10000E+01) 
(0. 15000E+ 01,0.15000E+01) 
(0. 40000E+01,0.40000E+01) 


4631527 | 8623355 
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Proc Speed 5.00/10.00 
MCP Mark I1I.6 
FORTRAN Mark I1.6 


SINGLE PRECISION REAL CONSTRUCTS 


FORTRAN 
Construct 


IF (Y) 10000, 10000, 20000 
10000 CONTINUE 
20000 CONTINUE 


W1(N2) = Y 
W1(N1,N2) = Y¥ 
= +.6517E-33 
= -.1740E-32 
= ABS(Y) 

= ALOG(X) 

= AMAX1(X,Y) 
= AMIN1(X,Y) 
= EXP(X) 

= N2 

SIN(Y) 

= SQRT(X) 
=<X+Y 

=x *Y 
=X-yY 

a ¥. 

= 0.0 

= 1.0 

= 97.01 


NNNNNNNNNNNNNNNNN 
N 


FORTRAN Construct Timings 


Range of Times 
in Microseconds 


1.2 us Memory 


4.0 - 5.1 


5.6 - 7.0 
5.6 - 8.4 
5.6 = 7.2 
5.9 - 13.7 

2.9 

2.9 

4.6 


* 


*k 
** 


2K 


OK 


KK 
2 KK 


1.6 us Memory 


6.3 ~ 8.1 


13.9 

30.1 

7.6 

8.0 

8.9 
211.3 - 262.5 
31.1 - 33.2 
31.1 - 33.2 
210.3 - 248.7 

6.8 
145.5 - 291.1 
97.1 - 246.1 
10.3 - 11.7 
10.3 - 13.1 
10.3 - 11.9 
10.3 - 18.1 


Proc Speed 


MCP 
FORTRAN 


Burroughs 
FORTRAN Construct Timings 


5.00/10.00 
Mark II.6 
Mark I1I.6 


INTEGER CONSTRUCTS 


10001 


10002 


10003 
20003 


4-4 


- B 6700 System Timings 


Range of Times 
in Microseconds 


FORTRAN 

Construct 1.2 us Memory 1.6 ws Memory 
CALL CONT 33.5 CK 54.0 
po 10001 I=1,M (9*M)+2.9 (15*M)+3.8 
CONTINUE 
GO TO 10002 1.6 
CONTINUE 
IF (N) 10003, 10003 , 20003 4.1 - 5.1 6.3 7 8.1 
CONTINUE 
CONTINUE 
L = IABS(N) 5.7 
L = ISIGN(M,N) 7.6 12.5 
L=M+N 6.1 - 6.5 11.0 - 11.4 
L=M#*#N 6.1 - 7.9 11.0 - 12.8 
L=M-N 6.5 - 6.9 11.0 - 11.4 
L=M/N 6.5 - 11.9 11.0 - 16.4 
L = MAXO(M,N) 19.2 20.0 31.2 - 32.0 
L = MINO(M,N) 18.8 - 19.8 31.2 - 32.2 
L = N**M 80.7 - 198.6 135.1 - 318.7 
L=0 2.9 
L=1 2.9 4.5 
L = 100 3.2 5.1 
L= 2 3.2 5.1 
L = 97 3.2 5.1 
L1(N2) = M 7.9 *K 13.9 
L2(N1,N2) = 21.3 30.1 


Proc Speed : 
MCP 
FORTRAN 


5. 
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00/10.00 


Mark II.6 
Mark II.6 


DOUBLE PRECISION REAL CONSTRUCTS 


~~~ eo > | 


FORTRAN 
Construct 


DABS (F) 
DEXP(E) 
DLOG (F) 
DMAX1(E, F) 
DMIN1(E,F) 
DSIGN(E,F) 
DS IN (E) 
DSQRT (E) 
E+ F 


F 
E- F 
F 
1D0 


511D511 
8D0 


COMPLEX CONSTRUCTS 


aaana 


i 


FORTRAN 


Construct 


A+B 
A *B 
A- B 
A/B 


Range of Times 
in_Microseconds 


8.3 


375.6 - 570.6 
405.2 - 412.0 
30.2 - 32.1 
30.2 - 32.1 

11.4 
268.8 - 442.0 
78.2 ~- 256.2 
10.3 - 12.7 
9.7 - 18.7 
10.3 - 12.9 
9.7 - 57.9 

5.0 

9.6 

5.2 


KK 


2K KK 


ok kK 
KK 


1.6 us Memory 
13.4 
632.6 - 829.6 
653.4 - 660.2 


51.0 - 53.5 
51.0 - 53.5 
19.2 


458.8 - 672.0 
129.4 - 358.6 
17.6 - 20.0 
17.0 - 26.0 
17.6 - 20.2 
17.0 - 67.2 
7.8 
15.6 
8.2 


Range of Times 
in Microseconds 


1.2 us Memory 


27.5 -— 30.7 
130.3 - 145.3 
28.3 - 31.1 
159.6 - 190.6 


1.6 us Memory 


45.1 - 48.1 
222.5 - 235.3 
45.8 - 48.6 
271.8 -— 300.6 
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4-6 


2K KOK 


2K OK OK 


NOTES 
The longer timing if the operand is positive (greater than zero) 
After the array is present in memory. 


These constructs call upon intrinsic routines of which each must 
be linked from the Dl stack prior to its first execution within a 
program. The first timing, which includes intrinsic linkage, will 
vary between 2 and 160 milliseconds, depending upon the presence 
or absence of certain MCP segments in main memory. The timings 
shown for these constructs were observed after the corresponding 


intrinsic was called once and linkage was thus established. 
CONT is a subroutine which consists of the following code: 


SUBROUTINE CONT 
10 CONTINUE 

RETURN 

END 
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